home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / 031-040 / amok40 / environment / mpwin.def < prev    next >
Text File  |  1993-11-04  |  757b  |  32 lines
  1. DEFINITION MODULE MPWin;
  2. (*---------------------------------------------------------------------------
  3.    :Program.    MPWin.Def
  4.    :Version.    3.3
  5.    :History.    Mar-90
  6.    :Author.     Markus Peuckert
  7.    :Address.    Schützenstr. 50, D-3550 Marburg, West-Germany,
  8.    :Copyright.  ShareWare
  9.    :Language.   Modula-2
  10.    :Translator. M2Amiga V3.3d
  11. ---------------------------------------------------------------------------*)
  12.  
  13. FROM Intuition    IMPORT    WindowPtr;
  14. FROM Graphics    IMPORT    RastPortPtr;
  15. FROM DosSupport    IMPORT    ID;
  16.  
  17.  
  18. CONST    WinLEFT        = 50;
  19.     WinTOP        = 20;
  20.     WinHEIGHT    = 32;
  21.     WinWIDTH    = 500;
  22.  
  23.  
  24. VAR        winTitle        : ARRAY [0..79] OF CHAR;
  25.     win, win2, ConPtr    : WindowPtr;
  26.     rp, rp2            : RastPortPtr;
  27.         fh            : ID;
  28.     DWidth, DHeight        : INTEGER;
  29.  
  30.  
  31. END MPWin.Def
  32.